home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-01 / cuj9204.zip / 1004010C < prev    next >
Text File  |  1992-06-02  |  148b  |  8 lines
  1. /* labs function */
  2. #include <stdlib.h>
  3.  
  4. long (labs)(long i)
  5.     {    /* compute absolute value of long argument */
  6.     return ((i < 0) ? -i : i);
  7.     }
  8.